** COVARIATE BALANCE TABLE // ESTIMATES TO BUILD FIGURE 5


*******************************
** OPEN STATA 14 **************
*******************************

use "POLITICAL EMANCIPATION -- POLAND DATA SET.dta", clear

global covariates "jewishpop"

* Bandwidth: MSE // All Towns

* ALTITUDE

rdrobust altitude distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all

* RUGGEDNESS

rdrobust ruggedness_20km distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all

* CROPLAND

rdrobust cropland_20km distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all

* PASTURE

rdrobust pasture_20km distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all

* DISTANCE TO RAILWAY

rdrobust nearestdist_to_railway1920 distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all

* TOTAL POPULATION

rdrobust totalpop distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all

* JEWISH POPULATION, 1921

rdrobust jewishpop distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all

* JEWISH POPULATION: 1750, 1800, 1850

rdrobust jews1750_leitenberg distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all

rdrobust jews1800_leitenberg distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all

rdrobust jews1850_leitenberg distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all

* JEWISH POPULATION, 1900

rdrobust jewishpop1900 distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all

* POLISH NATIONALITY

rdrobust polish21 distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all

* CATHOLICS

rdrobust rc21 distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all

* HASIDIC SCHOOLS

rdrobust yeshivot_cap distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all

* ETHNIC FRACTIONALIZATION

rdrobust ethnic_fract distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all

* RELIGIOUS FRACTIONALIZATION

rdrobust rel_fract distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all

* PERCENT JEWISH

rdrobust percent_j distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all


** TEACHERS PER 10,000 POPULATION

rdrobust teachersper10thousand distance distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all

*** CITY OF ORIGIN OF LANDMANSHATFTN IN NYC / JEWISH POPULATION IN 1900

. rdrobust landmanshaftncomplete_popjew1900 distance distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all

** PERCENT POLISH NATIONALITY

. rdrobust p_polish21 distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all

** PERCENT CATHOLIC

. rdrobust p_cath21 distance if type=="ville", kernel(triangular) p(1) bwselect(mserd) all
